.key ""
.bra {
.ket }

; $VER: InstallDCF77 3.1 (2.4.99)
; installiert DCF77

FailAt 100

Version >NIL:
IF NOT $Workbench GE "39."
	Echo "*nInstallation fr Workbench 2.0/2.1 luft:*n"
	Echo "DCF77 und GClock werden nach SYS:WBStartup kopiert...*n" 
	Resident >NIL: C:COPY PURE
	Resident >NIL: C:WAIT PURE
	Resident >NIL: C:ECHO PURE
	Resident >NIL: C:DELETE PURE

	/c/Retire DCF77
	Delete c:(DCF77|DCF77.info)
	Delete SYS:Utilities/(DCF77|DCF77.info)
	Delete SYS:Tools/Commodities/(DCF77|DCF77.info)

	CD "/Program"
	IF EXISTS DCF77
		Copy (DCF77|DCF77.info) SYS:WBStartup/
		CD /
		Copy Utilities/(GClock|GClock.info) SYS:WBStartup/
	Else
		Echo "*N Es fehlen Dateien. Bitte benutzen Sie die unvernderte*n DCF77-Diskette.*n"
		Wait 5
		Endshell
	EndIf
	Echo "*nDCF77 ist jetzt installiert.*n"
	Wait 5

Else

	RequestChoice >ENV:DCFSetup{$$} "InstallDCF77" "Dieses Skript kopiert DCF77 nach WBStartup*nund lscht frhere Installationen von DCF77.*n*nInstallation ausfhren?" "Weiter" "Abbrechen"
	IF $DCFSetup{$$} EQ "1"
		Resident >NIL: C:COPY PURE

		/c/Retire DCF77
		Delete c:(DCF77|DCF77.info)
		Delete SYS:Utilities/(DCF77|DCF77.info)
		Delete SYS:Tools/Commodities/(DCF77|DCF77.info)

		CD "/Program"
		IF EXISTS DCF77
			Copy (DCF77|DCF77.info) SYS:WBStartup/
			/c/FreeIconPosition SYS:WBStartup/DCF77
			CD /
			RequestChoice >ENV:DCFSetup{$$} "InstallDCF77" "Soll auch die Uhr GClock*nnach WBStartup kopiert werden?*n*n(GClock zeigt den aktuellen Empfangszustand an.)*n" "Ja" "Nein"
			IF $DCFSetup{$$} EQ "1"
				Copy Utilities/(GClock|GClock.info) SYS:WBStartup/
				c/FreeIconPosition SYS:WBStartup/GClock
			EndIF
			RequestChoice >ENV:DCFSetup{$$} "InstallDCF77" "Soll auch TimeSignal*nnach WBStartup kopiert werden?*n*n(TimeSignal erzeugt ein Zeitzeichen.)*n" "Ja" "Nein"
			IF $DCFSetup{$$} EQ "1"
				Copy Utilities/TimeSignal SYS:WBStartup/
				IF NOT EXISTS SYS:WBStartup/TimeSignal.info
					Copy Utilities/TimeSignal.info SYS:WBStartup/
					c/FreeIconPosition SYS:WBStartup/TimeSignal
				EndIf
			EndIF
		Else
			Echo "*N Es fehlen Dateien. Bitte benutzen Sie die unvernderte*n DCF77-Diskette.*n"
			Wait 5
			Endshell
		EndIf

		Delete ENV:DCFSetup{$$} QUIET

		RequestChoice >NIL: "InstallDCF77" "DCF77 ist jetzt installiert." "Weiter"
	Else
		Echo "*n Installation abgebrochen."
	EndIF
EndIF

